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4 LERW - FILEREAD 10 MODULE 
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Extend parmeter tise" to FIL RDWRTLBN to make it 
possible to read more than one block at a time. This 
enhancement was pece in conjunction with the cacheing 
feature in FILEREAD 


1 -TITLE FILERWIO = FILEREAD 10 MODULE 
f HREM EGER 
: [eeeeeeeeeereerereeeeeerereneeeeeeeneeeeeeeeeneneeeeeeeeeeeeereeeerreeeeeere 
3* * 
§ :* COPYRIGHT (c) 1978, 1980, 1982, 1984 B e 
0 :* DIGITAL EQUIPMENT eGORPORATION, © MAYNARD. MASSACHUSETTS. * 
4 8 :* ALL RIGHTS RESER > 
Ps ® 
$0 10 :* THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED » 
00 11 :* ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE ®« 
90 1g :® INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER e 
000 13 :* COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY ®* 
0000 14 :* OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE is HEREBY * 
900 13 i* TRANSFERRED. e 
Py o 
909 i$ 3* THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * 
00 18 :* AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * 
990 19 :* CORPORATION. * 
P4 & 
0000 A :® DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS ®* 
9000 g ;* SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. « 
° e 
0900 : | see ceasinpnnnnnnneathennnelanenedtenneenansenenebbeeiaaeendaeneneeenes 
444 5 34 
900 g ; FACILITY: USER CALLABLE PROCEDURES 
2099 0 ; ABSTRACT: 
4 ¢ : THIS MODULE PERFORMS LOGICAL BLOCK 1/0 FOR FILEREAD 
9000 4 : ENVIRONMENT: USER MODE 
9000 36 : AUTHOR: PETER H. LIPMAN , CREATION DATE: 14-DEC-76 
9000 38 : MODIFIED BY: 
000 9; 
9000 40 : v02-001 PHL 0007 rH. Lipm 14-Mar-1981 
: 4g ; 
0 45 ; 
44; 
° 45; 
0 46; 
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-PSECT YFILEREAD,BYTE,EXE 
ore .SBTTL RDWRTLBN = READ/WRITE LOGICAL BLOCK NUMBER 
: FUNCTIONAL DESCRIPTION: 


: THIS ROUTINE READS/WRITES N BYTES FR git THE SPEC 
; LOGICAL BLOCK NUMBER OF THE VOLUME ASSIGNED THE SPECI 


; CALLING SEQUENCE: 
: CALLG ARGLIST,FILSRDWRITLBN 
; INPUT PARAMETERS: 


IFIED 
FIED CHANNEL 
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e 
0 ; 
0 ; 
a0) 38 | 
0000 ; 
ae 
0000 : CHAN(AP) = ;CHANNEL ASSIGNED TO THE VOLUME TO READ 
0000 ; LBN(AP) = {LOGICAL BLOCK NUMBER TO READ 
0000 ; BUF ADR (AP) = SADDRESS OF BUFFER TO READ INTO 
0000 ; 1OFUNC (AP) = +1/0 FUNCTION CODE 
8 8 3 BYTCNT (AP) = ‘NUMBER OF BYTES TO TRANSFER 
6 0 : IMPLICIT INPUTS: 
6 0 : NONE 
6 0 : OUTPUT PARAMETERS: 
6 6 i : RO = SYSTEM STATUS CODE 
0000 78 : IMPLICIT OUTPUTS: 
0000 79: 
0000 80: NONE 
0000 81; 
0000 82 > COMPLETION CODES: 
0000 83 ; 
0000 «84: UNE 
0000 85 ; 
9009 86 : SIDE EFFECTS: 
999 87 ; 
0000 «88: NONE 
0000 89: 
0000 90 : EQUATED SYMBOLS: 
009 38 : OFFSETS FROM AP 
00000004 $00 94 * CHAN - 4 : CHANNEL TO WHICH VOLUME IS ASSIGNED 
00000008 000 95 BN = 8 SLOGICAL BLOCK 
00000 o¢ 00 96 BUF ADR = 12 SBUFFER ADDRESS. 19 READ INTO 
90000 1 00 97 1OFUNC = 16 SFUNCTION CODE FOR THE QI0 
00000014 00 98 BYTCNT = 20 [NUMBER OF BYTES. fo TRANSFER 
00 0 ie. 
1 ¢ FILSRDWRTLBN:: 
0009 | 1 : 0 
SE 08 «OC 104 SUBL  #8,SP sALLOCATE AN IO STATUS BLOCK 
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FILERWIO - FILEREAD I0 MODULE 16-SEP-1984 00:12:1 AX/VMS Macro V04-00 Page 3 FOR 
VO4e 000 RDWRTLBN = READ/WRITE LOGICAL BLOCK NUMB g-SEF 198 99:15:48 SYS.SRCJFILERWIO.MAR; 1 (1) Tab 
50 SE 00 105 MOVL sADDRESS OF I0 STATUS BLOCK 
: SO10W. $ Chie N= CHAN (AP 
108 roses (ROS - SADDRESS | OF 1/0 STATUS BLOCK 
it peseeveameGey) REFER pbs 
= ” 2NU. 
a |e) ep Cc LOGICAL BLOCK wuNBER 
50 (GE OCC 0 118 ies MOVZWL (SP) ,RO ‘STATUS CODE FROM I/O STATUS BLOCK 
04 00 115 ee 
00 1 116 
Beet END 


),- CHANNEL 
AP) ,- :1/0 FUNCTION CODE 
p 


"Sr$EP=1986 08:48:09 ESYS\SRCTPILERUIOSMAR: 1 


FILERWIO 
Symbol table 


- FILEREAD I0 MODULE Page 


T1 . £800 008 
BUF ADR = Ba08 oc 
BYTCNT - 8 14 
CHAN = 00000004 
F ILSROWRTLBN 00000000 RG 01 
1OF UNC = 00000010 
LBN = 00000008 
SYS$Q10W eeeeeeee GX 01 
deer ren awn emecece + 
! Psect synopsis ! 
Peewee een ene ee mae} 
PSECT name Allocation PSECT No. Attributes 
- ABS , 00000000 < 0.) 00 ¢ QO.) NOPIC USR CON ABS LCL NOSHR NOEXE NORD NOWRT NOVEC BYTE 
YFILEREAD 00000031 ¢ 49.) O01 ¢ 1.) NOPIC USR CON REL LCL NOSHR EXE RD WRT NOVEC BYTE 
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Performance indicators H 


Phase Page faults CPU Time Elapsed Time 
Initialization 35 00:00:00.04 00:00:02.24 
Command processing me 00:00:00.50 00:00:04.95 
Pass 112 00:00:00.65 00:00:05.67 
Symbol table sort 0 00:00:00.00 00:00:00.00 
ass 39 a Bo 4 SE 00:00:01.92 
Symbol table output 1 Bp 288: 0.02 00:00:00.02 
Psect synopsis output 1 00:00:00.01 00:00:00.01 
Cross-reference output 0 et 00:00:00.00 
Assembler run totals 324 00:00:01.5 00:00:14.82 


The working set Limit was 1050 pages. 

2056 bytes (5 pages) of virtual memory were used to buffer the intermediate code. 

There were 10 pages of symbol table space allocated to hold 8 non-local and 1 local symbols. 
117 source Lines were read in Pass 1, producing 11 object records in Pass 2. 

4 pages of virtual memory were used to define 4 macros. 
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Macro Library name 
~ $52 2SDUACB: SYS.OBJJLIB.MLB;1 0 
$255$DUA28: CSYSLIBISTARLET.MLB;2 4 
TOTALS (all Libraries) 4 


49 GETS were required to define 4 macros. 


There were no errors, warnings or information messages. 
MACRO/LIS=LIS$:F ILERWIO/OBJ=OBJ$:FILERWIO MSRC$:F ILERWIQ/UPDATE=(ENHS:F ILERWIO) +EXECML$/LIB 
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